home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / intmail2 / msreg.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1999-08-03  |  1.1 KB  |  30 lines
  1. (**********************************************)
  2. (*  The Internet Mail Suite  2.00             *)
  3. (*  (c) ArGo Software Design, 1995-1999       *)
  4. (*  http://www.argosoft.com                   *)
  5. (*  support@argosoft.com                      *)
  6. (**********************************************)
  7. unit msreg;
  8.  
  9. interface
  10.  
  11. uses Classes, msSocket, msSMTP, msHTTP, msPOP, msMsg,
  12.   DsgnIntf, msMsgCls, msaddrpe, msAttPe, msFTP, msNNTP, msVersPe;
  13.  
  14. procedure Register;
  15.  
  16. implementation
  17.  
  18. procedure Register;
  19. begin
  20.   RegisterComponents('Internet Mail Suite', [TmsSimpleListenerSocket, TmsListenerSocket,
  21.     TmsClientSocket, TmsSMTPClient, TmsPOPClient, TmsHTTPClient, TmsMessage,
  22.     TmsNNTPClient, TmsArticle, TmsFTPClient]);
  23.   RegisterPropertyEditor(TypeInfo(TmsAddressList),nil,'',TmsAddressListProperty);
  24.   RegisterPropertyEditor(TypeInfo(TmsAttList),nil,'',TmsAttListProperty);
  25.   RegisterPropertyEditor(TypeInfo(string),TmsSocketBase,'Version',TmsVersionProperty);
  26.   RegisterPropertyEditor(TypeInfo(string),TmsCustomMessage,'Version',TmsVersionProperty);
  27. end;
  28.  
  29. end.
  30.